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Forth Notes - #2 
By Bob Floyd 

In this article, I f ll cover the 
FORTH concept of "words” and the 
most common words, + , - , * and 
three forms of / • I* 1 1 also 
cover more on Reverse Polish 
Notation (RPN) and the stack and 
leave you with a sample word and a 
partial explanation of how It 
works. 

A standard FORTH package Is 
comprised of a set of words which 
make up a "dictionary". Va I FORTH 
contains the standard flg-FORTH 
dictionary (fig stands for Forth 
Interest Group) plus many extra 
words created especially for ATARI 
computers. Hence It Is, quoting 
Yalpar, an "extended flg-Forth." 

A word In FORTH Is simply a 
subroutine. The word may be 
comprised of machine code or a 
series of other previously defined 
FORTH words. Many of the standard 


dictionary words are In machine 
code. Even though this Is not 
exactly correct, I like to think of 
FORTH as a series of machine 
language subroutines available for 
my use. Thus, the standard 
dictionary words can be used as 
building blocks In creation of 
other words by the home computer 
user. In this way, you can 
"tailor" the language to your own 
use. Debugging of new words Is 
best accomp 1 1 shed one word at a 
time, and Is not too difficult to 
do In this manner. However, you 
should be careful not to let your 
words get too long. 

The most common and basic of FORTH 
words are the arlthmatlc operands + 

MOD and /MOD . 
These are all In machine code. 
Here are examples of their use: 


YOU TYPE STACK 


7 

3 

+ <CR> 

( 10 ) 

7 

3 

- <CR> 

( 4 ) 

7 

3 

* <CR> 

( 21 ) 

7 

3 

/ <CR> 

( 2 ) 

7 

3 

MOD <CR> 

( 1 ) 

7 

3 

/MOD <CR> 

(12) 


In the examples, 3 can be thought 
of as the top of stack (TOS) and 7 
as the second number on the stack. 
So, for subtraction, the number at 
TOS Is subtracted from the second 
number on the stack. Or, for 
division, the number at TOS Is 
divided Into the second number on 
the stack. The result of the 
operation Is then stored at TOS. 
Note that for division, / leaves 
the quotient at TOS, wheras MOD 
(I.e., modulo) leaves the 
remainder, and /MOD leaves both the 
remainder and the quotient with the 
quotient at TOS. It Is surprising 
to me how many times I have used 
MOD and /MOD. 

Obviously, these operations are 



much simpler than using machine 
code. All that one must do Is 
think In reverse (I.e., RPN) which, 
with practice, becomes easier than 
you might suspect. You must get 
the numbers onto the stack before 
you can operate on them. My most 
common errors are not having a 
number on the stack that a word Is 
expecting to use, and "flooding the 
stack” with a looping operation 
that mistakenly leaves an extra 
number on the stack upon each loop. 
This Is when It pays to debug short 
words one at a time. 

Here Is a simple word that returns 
the square of a number: 

: SQUARE ( nl — n2 ) 

DUP * ; 

Note that DUP duplicates the number 
at TOS and puts the copy at TOS 
(I.e., the same number occupies TOS 
and the second position on the 
stack.) Then * multiplies them 
together. For example, when " 8 

SQUARE " Is typed or Is placed In a 
new word, then 64 Is returned and 
placed at TOS. The : and ; are 
used In defining the word - more on 
them I ater • 

Here Is another word, named PADL, 
that I have used In a Pong-type 
game: 

: PADL ( pdl# — vpos ) 

PADDLE DUP 36 < 

IF DROP 36 
ELSE DUP 194 > 

IF DROP 194 
END IF 
END IF ; 

It reads the desired game paddle 
and limits the range of values to 
be from 36 to 194. The paddle 
number to be read Is already 
expected to be at TOS before the 
word Is executed. "PADDLE" 
actually reads the paddle value and 
Is Included In one of the Va I FORTH 
packages. DROP- removes the value 


at TOS. The rest of "PADL" limits 
the range of values and returns a 
value to be used for PONG paddle 
height at TOS upon completion. 
I* 1 1 leave the explanation of > , 
< , IF , ELSE and END IF as food 
for thought for my next column. 

(editor's note: Articles talged 
(sorry) with a * In the title were 
received after the deadline. Only 
my great kindness allowed me to 
enter these In the newsletter.) 

* RANDOM RETURNS 


Our apologies for the neutral 
answer concerning the capabilities 
of the BASIC XL program over all 
other versions of BASIC. Since we, 
the two authors, are not yet 
financially secure we are not able 
to purchase and test all programs 
available. We would like to say 
that our recent conversations with 
ATARI users confirm the opinion 
expressed In the review of BASIC XL 
In the last newsletter: currently 
BASIC XL Is the best BASIC 
available. One final note Is that 
there seems to be an Interest In 
conducting a complete benchmark 
test for various hardware and 
software products. This would 
cover all models of ATARI 
computers, the fast chip as well as 
the versions of BASIC available. 
We have not found a complete list 
of these results to date but we do 
have access to several benchmark 
programs. If you have a list of 
verified benchmark runs or are 
Interested In helping with the 
compilation of test results contact 
Bernard King-Smith (H) 922-0698. 

Well, not too many questions In 
this month's Random Access Memos. 
There Is an article elsewhere In 
this newsletter concerning the way 
to use more than four colors In a 
display. However, for those of you 
who have or plan to build the sure- 


load device please take note. 

♦♦♦HARDWARE WARNING*** 

FOR THOSE OF YOU WHO INSTALLED THE 
SURELOAD CIRCUITRY INTO YOUR 
COMPUTER AS DESCRIBED IN THE 
FEBRUARY NEWSLETTER: DO NOT UNDER 
ANY CIRCUMSTANCES FLIP THE RAM/ROM 
SWITCH TO THE ROM POSITION WITH A 
CARTRIDGE INSTALLED. DOING THIS 
WILL BURN OUT THE INTEGRATED 
CIRCUIT SOLDERED INTO THE MACHINE. 

(another editorial comment — I have 
Installed the sure load circuitry 
and have not experienced this 
problem. • .but I don't suggest 
trying It to find out.) 

DISKS OF THE MONTHS PAST 


DISK #1 


FILE NAME 

DESCR 1 PT 1 ON 

SCRNDUMP.OBJ 

GR. 8 SCREEN DUMPER 

TO EPSON GRAFTRAX 

READDATA.WRT 

READS OBJECT FILES & 

CREATES DATA 

STATEMENTS 

MENUHELP 

A MENU CREATOR 

MATHTUT 

SIMPLE MATH QUIZZER 

LUNAR 

LAND THE LUNAR BUGGY 

FLAGS 

GUESS THE COUNTR 1 ES 

FROM THEIR FLAGS 

DUPV 1 S 

MODIFIED DUPANY FOR 

VISICALC 

DUPANY .OBJ 

S 1 MPLE D 1 SK SECTOR 

COP 1 ER 

DISK 2 

SURROUND 

AVOID HITTING WALLS 

AND TRAILS 

SIMON 

ONE OF THOSE PESKY 

SIMON GAMES 

ROBOT 

AVOID THE ROBOTS 

OTHELLO 

OTHELLO, WHAT ELSE 

LLIST 

TAKES L 1 STED F 1 LES 

AND PRINTS ON PRINTER 

DUNGEON 

ADVENTURE-CAN YOU GET 

OUT? 

CASTDISK.OBJ 

S 1 MPLE S 1 NGLE BOOT 

CASSETTE TO DISK 


- 2 - 


BUG 

WUMPUS 

VIDTEX28.00 

UPDNTAPE 

ULTRAPM 

TAPEBACK 

SOUNDTST 

MORSECDR 

MODEM ^ 
MATHPRNT 

B I SASM 
ADYENTUR 

VEGAS 

VARIABLE.LST 

ROBOTWAR 

NIGHTMARE 

MISSILE 

METR I CS 
LANDER 

FUGUE2 

DAYOWEEK 

BOTCH 
BIOCHART 
AUTORUN. CAS 

AUTORUN. BLD 

TTT 


COPIER 

HELP THE LADYBUG GET 
AWAY (2 PLAYERS) 

DISK 3 

CLASS I C HUNT THE 

WUMPUS GAME 
COMPUSERVE 1 S MODEM 
PROGRAM FOR ATARIS 
A MODEM PORGRAM FOR 
CASSETTES 

A FAST PLAYER MISSILE 
DEMONSTRAT I ON 
A SINGLE BOOT TAPE TO 
DISK COPIER 
TEST ALL 4 VOICES 
WITH JOYSTICK 
PRACT I CE YOUR MORSE 
CODE 

A MODEM PROGRAM 
PR I NTS MATH PROBLEMS 
ON PRINTER 
A DISASSEMBLER 
FIND YOUR WAY OUT OF 
THE FOREST 

DISK 4 

VERY CHEAP SLOT 

MACH I NE 

L I ST ALL VAR I ABLES 
USED IN YOUR PROGRAM 
AVO I D THE ROBOTS 
AGAIN 

NOW WHAT WILL HAPPEN? 
GOOD BASIC MISSILE 
COMMAND GAME 
METRIC CONVERTER 
ANOTHER LUNAR LANDER 
GAME 

PLAYS NICE MUSIC 
TELLS YOU THE DAY OF 
THE WEEK FOR A GIVEN 
DATE 

A HANGMAN GAME 
A BIORYTHM PROGRAM 
AUTORUNS CSAVED 
FILES 

CREATES BASIC PROGRAM 
RUNNING AUTORUN. SYS 

DISK 5 

TIC TAC TOE 


ft ftv?® 



mm 


»fg gsf* 




PR I CE L_ I 

Pick one up at the next TAI6 aeeting 
or call to have one sailed out. 


I 


Here 


Over 800 programs 
from A to Z for your Atari ! 
are a few samples from that list 


ENCOUNTER 

-D- 

$25.97 

OIL’S NELL -R- 22.97 

HONE ACCOUNTANT-D- 52.97 

MAC/65 

-D- 

55.97 

BASIC XL -R- 49.97 

SYN-CALC 

-D- 71.97 

KINSMAN 

-D- 

25.97 

ACTION -R- 49.97 

JUMPMAN 

-D- $28.97 

PHARAOHS CURSE 

-D- 

25.97 

STAR L.BASEBALL-D- $24.97 

LODE RUNNER 

-D- 25.97 

RALLEY SPEEDWAY R- 

34.95 

ATARI TOUCH TABLET 69.97 

JOUST 

-R- 38.97 

PLANETFALL 

-D- 

34.97 

INDUST DRIVES 349.00 

MS. PACMAN 

-R- 38.97 

SORCERER 

-D- 

34.97 

ATARI 1027 PRINTER 289.00 

R0B0TR0N 2084 

-R- 35.97 

DEATH STAR 

-D- 

34.97 

ATARI 800XL 297.00 

POPEYE 

-R- 34.97 

DUNZHIN 

-D- 

22.97 

KRAFT JOYSTICKS 8.97 

PEN60 

-R- 35.97 

YOUR ATARI COMP.B- 

15.97 

NICO 3NAY JOYSTICK 24.00 

SCRAPER CAPER 

-R- 34.97 

DONKEY KONB 

-R- 

37.97 

ELEPHANT DISK 10/DD 21.70 

ZGRK I-II-III 

-D- 28.97 

DONKEY K0N6 JR, 

.-R- 

39.97 

VERBATIM DISK 10/DD 28.97 

DIMENSION X 

-D- 25.97 

ATARI LOGO 

-R- 

76.97 

CF DISKS 10/SS/SD 15.97 

ENCOUNTER 

-D- 25.97 

INVENTORY REDUCTION E 

sale: 

PRICES 

ALL BELOW DEALER COST 


Quantities are lisited and sost unsold prograas Hill 

be returned to 

distributors 

May 1st. 

Don’t aiss your chance to pickup a classic at a steal. 


NECROMANCER -D- $17.97 

WIZARDS OF WOR 

-R- 9.97 

DATABASE DIALER -D- 

9.97 

ZEPPLIN -D- 17.97 

REAR 6UARD 

-D- 9.97 

DEMON ATTACK -R- 

9.97 

RAINBOW WALKER -D- 17.97 

STELLAR SHUTTLE D- 12.97 

WIN6MAN -D- 

19.97 

DRELBS -D- 17.97 

WAYOUT 

-D- 19.97 

CHOPLIFTER -D- 

19.97 

TUMBLE BUSS -D- 7.97 

REPTON 

-D- 19.97 

SUNCOH STAR JOYSTICK 5.97 

TEMPLE APSHAI -D- 22.97 

BANDITS 

-D- 19.97 

TAC*2 JOYSTICK 

7.97 

UPPER REACHES AP. 12.97 

MINER 2049ER 

-R- 19.97 

SLIK STICK 

$4.97 

GATEWAY APSHAI -R- 22.97 

PATHFINDER 

-D- $12.97 

SAME SWITCH 

1.97 

STAR WARRIOR -D- 22.97 

L0AD-N-60 

-D- 7.97 

LEFTY JOYSTICK ADAP. 

1.97 

TT#11 MEMORY MAP D- 9.97 

BASIC-XA 

-D- 19.97 

4 FT. JOYSTICK CABLE 2.97 

PACIFIC COAST HWY D 14.97 

BOB’S BUSINESS 

-D- 7.97 

14K ATARI HEH. BOARD 9.97 

PICNIC PARANOIA R- 24.97 

M. WORD PROCESSOR-D- 9.97 

RANA 1000 D. DRIVE 297.97 


COMING ATTRACTIONS 

— A preview/review of Atari Lab. 

Action! RUNTIME library Is available. Read the review next month. 

— Where to find parts for your 800. 


How to load KoalaPad pictures from BASIC. 



PLUSZERO 

STOP THE ZERO WITH 


LAPS 


GENERATOR 


YOUR PLUS 

STARWARP 

A STAR TREK 



HORSE 

RUNS A HORSE ACROSS 


SIMULATION 


DISK #12 


YOUR TV SCREEN 

POEM 

A POEM CREATOR 



HANGMAN 

WHAT DO YOU THINK IT 

OCTADRAW 

DRAW WITH LOTS OF 

TVTEST 

PUTS A TEST PATTERN 


IS? 


PENS 


ON YOUR TV SCREEN 

GALLERY 

SHOOTING GALLERY 

NOTEOUT 

NOTES AND POINTS 

SUPRCOMP 

COMPARES 2 L 1 STED 

ERRTRAP 

AN ERROR TRAP ROUTINE 


EXAMPLE 


FILES FOR DIFFERENCES 

DO GG 1 ES 

SW 1 TCH THE DOGS 

NOTE 1 N 

NOTES AND PO 1 NTS 

SLIDE 

MATH RACE FOR TWO 


AROUND 


EXAMPLE 

SIMON 

PLAYS A GAME OF SIMON 

DDHELPER 

D&D AID 

MEMDUMP 

DUMPS CONTENTS OF 

SCREENPR 

PRINTS GR.O SCREEN TO 

CHOPST I X 

PLAYS CHOPST 1 CKS ALL 


MEMORY 


PR 1 NTER 


OVER YOUR SCREEN 

HORSERAC 

BET ON YOUR FAVORITE 

PUFF 

PLAYS PUFF THE MAGIC 

BOOKL 1 ST 

DATA BASE PROGRAM FOR 


HORSE 


DRAGON 


BOOKS 

ELEC 

RUN AN ELECTR 1 C 

MOBSTERS 

SHOOT EM UP 

BEG 1 NTYP 

TYPING PRACTICE 


COMPANY FOR A WHILE 

MATCHES 

DON'T TAKE THE LAST 

ALIEN 

CHEAP MISSILE COMMAND 

DARKSTAR 

BLOW UP UNSTABLE STAR 


MATCH 

ALCOHOL 

DETERMINES THE 


SYSTEMS 

LIGHT 

A TUTORIAL ON LIGHT 


ALCOHOL CONTENT OF 

C 1 PHER 

CREATE AND DECODE 

LABELDSK 

CREATES D 1 SK 1 NSERTS 


BLOOD 


C 1 PHERS 


FOR DISK PAGES 



CALCNT 

CALORIE COUNTER 

ENEMY 

GUN DOWN THE ENEMIES 


DISK 6 

APPLEATR 

WORM EATS AN APPLE 

DOGB 1 TE 

AVOID GETTING BIT BY 






THE DOGS 

ADVENTURE 

A DISK BASED 


DISK 9 

DDCREATR 

N 1 CE D&D PLAYER 


ADVENTURE 




CREATOR 



SPY 

FIND THE HIDDEN SPIES 

BATS 

AVOID THE BATS 


DISK 7 

SOUNDSTK 

ANOTHER JOYST 1 CK 






SOUND TESTER 


DISK 13 

TOWERS 

A TOWER OF HANOI GAME 

RENUM.LST 

RENUMBERS YOUR BASIC 



STRNG.CRE 

CREATES A STRING OUT 


PROGRAM 

XMASTREE 

ANOTHER CHR 1 STMAS 


OF MEMORY 

PSDLDBP 

A SUPER NICE DISK 


PROGRAM 

STATES 

STATES AND CAP 1 TALS 


INVENTORY PROGRAM 

STOPSOUN 

STOP THE RIGHT SOUND 


GAME 

NUMBEL 1 

A NUMBER L 1 NE 

STARWARS.MUS 

PLAYS THE STAR WARS 

RUNWAY 

LAND YOUR AIRPLANE ON 


PRACT 1 CE 


THEME 


THE RUNWAY 

HEXADEC 

DEX CONVERTER 

STARSH 1 P 

DRAWS A SPACESHIP 

MEMDUMP 

DUMPS CONTENTS OF 

DIALOGUE 

AN ICEBREAKER FOR NON 

SCEEN 

CREATE YOUR OWN 


MEMORY 


COMPUTER 1 STS 


SCENES 

MAGIC 

AN OLD CARD TRICK 

CONCEN 

GAME OF CONCENTRATION 

PMPDEMO 

PLAYER MISSILE DEMO 

D 1 SKTAPE 

TRANSFER BAS 1 C 

CLEWSO 

YOU SOLVE THE MYSTERY 


USING STRINGS 


PROGRAMS FROM DISK TO 

CH 1 CKEN 

HOW MANY TIMES DID 

MYRI PEDES. OBJ 

A CENTIPEDE GAME 


TAPE 


THE CHICKEN CROSS THE 

LOGO 

D 1 SPLAYS THE ATAR 1 

CIVILWAR 

CLASSIC COMPUTER 


ROAD? 


LOGO 


GAME, WAR SIMULATION 

CALENDAR 

CREATES CALENDARS FOR 

INVENTRY 

A DATA BASE FOR 

CARDS. COR 

A CARD DRAW 1 NG 


YOU 


1 NVENTORY 


ROUT 1 NE 

BLKJCK 

PLAY A GAME OF 

HOMELOAN 

HOW MUCH WILL THAT 

BOWL.SS 

A GOOD BOWLING GAME 


BLACKJACK 


LOAN COST ME? 

APT 1 TUDE 

ARE YOU QUALIFIED 

ASTRONOM 

AN ASTRONOMY GAME 

FUNCT 1 ON 

YOU GUESS THE 

AMER 1 CAS 

WHAT ARE THE CAPITALS 




FUNCT 1 ON FROM MATH 


AND COUNTRIES 


DISK #10 


RESULTS 

ALIEN.SS 

A MISSILE COMMAND 



DEC 1 DUMP 

DUMPS MEMORY 1 N 


TRA 1 NER 


— 


DECIMAL, NOT HEX, 






FORMAT 


DISK 8 


DISK #11 

B 1 ORYTHM 

ANOTHER Bl ORYTHM 






PROGRAM 

TIMETRAL 

RACE AROUND FOR 5 

NUMBERS 

RANDOM NUMBER 




WUMPUS 

DISK 14 

ORIGINAL WUMPUS 

TAXMAN 

KEEP AS MUCH AS YOU 

STNIC.PIC 

CAN 

ST. NICHOLAS DATA FOR 

SIMON 

PRINT. BAS 

YET ANOTHER S 1 MON 

ROCKET 

GAME 

WATCH A ROCKET TAKE 

PRINT. BAS 

OFF 

PR 1 NTS DATA F 1 LES 

MONOPOLY 

USING CHARACTERS 

MONOPOLY ANYONE? 

LABELDSK 

LABELDSK RETURNS 

KEYBOARD. MUS 

(SORRY) 

PLAYS MUSIC FROM THE 

HEXADEC 

KEYBOARD 

HEXADEC RETURNS 

HAMURAB 1 

(SORRY) 

ECONOMIC GAME 

ERTHQWAK 

EARTHQUAKE 

DRAGMAZE 

FIND YOUR WAY OUT OF 

CHARL IE.PIC 

THE DRAGON »S MAZE 

DATA FOR PRINT. BAS - 

XMODEM 

CHARLIE BROWN PICTURE 

DISK 15 

RECOMMENDED MODEM 

SL0TS2 

PROGRAM FOR TAIG BBS 

ANOTHER SLOT MACHINE 

SLOTS 

A SLOT MACHINE 

RPMTEST 

DISK SPEED CHECKER 

ROBOT 

BERSERK TYPE GAME 

CASTLE 

AN ADVENTURE 

BALLOONS 

POP THE BALLOONS 

YAHTZEE 

DISK 16 

PLAY YAHTZEE 

T 1 NYTEXT 

A BASIC WORD 

PONG 

PROCESSOR 

MACHINE LANGUAGE PONG 

FROG 

GAME 

EAT ALL THE FLIES 

F 1 NANCE 

A FINANCIAL AID 

DUNGE0N2 

PROGRAM 

F 1 GHT YOUR WAY 

BANKSHOT 

THROUGH 

BANK THE POOL BALL IN 

CLOCK.DIG 

DISK 17 

A DIGITAL CLOCK 



CALENDAR 

WORLD 

GUESS AT THE WORLD 

CAPITALS 

DUNGEON.BAT 

DO BATTLE WITH THE 

EVIL MAGICIAN IN HIS 
CASTLE 

FOOTBALL 

A FOOTBALL GAME, WHAT 
ELSE? 

SPEEDREA.D 

LEARN HOW TO INCREASE 

YOUR READING SPEED 

ETCHPRNT 

DRAW ON YOUR TV 

SCREEN 

USA .PIC 

PICTURE OF THE UNITED 
STATES 

LANDER.PIC 

PICTURE OF A LANDER 

DISK 18 

SUPERMAN 

MAN OF STEEL GAME 

PR 1 NTCAL 

PRINT A CALENDAR 

MOONSURV . 1 AL 

STRANDED ON THE MOON 

SNAKE 

HIT AS MANY BOXES AS 
YOU CAN WITH THE 

SNAKE 

HATNR 1 NG 

PRESIDENTIAL ELECTION 

GAME 

GEOQU 1 Z 

GEOGRAPHY QUIZ 

PINBALL 

ANOTHER PINBALL GAME 

DETECT 1 VE 

SOLVE THE CRIME 

MATHT 1 ME 

A MATH TEST 

DISK 19 

SHAD 1 NG 

CUBE COLOR DEMO 

OILGAME.REV 

DRILL WELLS, MAKE 
MONEY 

COMBAT 

DO BATTLE W 1 TH 

MONSTERS 

M0DEM3 

MODEM/DISK UTILITY 

CARDS 

PROGRAM YOUR OWN GAME 

D 1 SKDUMP 

DISK/PRINTER UTILITY 

F 1 VESTUD 

BEAT ALBERT AT CARDS 

CHEMQU 1 Z.BAS 

EDUCAT 1 ONAL 

LEYTE. II 

WAR GAME 

SUPERCUBE. 2 

TRY IT AND SEE 

DISK 20 

SUPSL0TS.B01 

ANOTHER SLOT GAME, 
AGAIN 

ALIENCAP.TUR 

CAPTURE THE ENEMY 

SHIP 

PA 1 NTDUE . 1 6K 

DUEL WITH BIG BIRD 

MAILMAN 

DELIVER THE MAIL, BUT 
WATCH OUT FOR THOSE 


MATCHKID.S 

DOGS 

HIGH NUMBER MATH 

FUNCPLOT • UTL 

NEAT GRAPHICS 

TREASURE 

FIND THE LOST TREASURE 

STARDSTR 

PENETRATE UNKNOWN 

PROGRAM.NO 

STAR SYSTEM 

A PRIME NUMBER 

FALCON 

PROGRAM GENERATOR 

DRAWS THE STAR WARS 

SPELLBEE 

SHIP 

A SPELLING GAME 

PRICE 

A GUESSING GAME 

MAGIC 

YET ANOTHER MAG 1 C 

JAZZ 

TRICK 

A SCREEN GRAPH 1 CS 

MAGBLK.GAM 

D 1 SPLAY 

ANOTHER (****) GAME 


DISK 21 

XMODEM43.COM ANOTHER MODEM UTILITY 

SUPRDUP.COM A SUPERDUP TYPE 

UTILITY 

ESCAPE PILOT YOUR SHIP 

AVOIDING METEORS 

REVERSE SOLVE HOW TO REVERSE 

RANDOM ORDER OF 
NUMBERS 

ZONEX AVOID HITTING 

HORIZONTAL AND 

VERTICAL BARS 

PACINVAD.BAS SHOOT DOWN THE PACMAN 

TYPE INVADERS 

RECKLESS HOW GOOD A DRIVER ARE 

YOU? 

METSTRM AVOID HITTING THE 

METEORS IN THIS GAME 

NEWCLOCK.BOI PICK THE TIME AND 

WATCH IT APPEAR ON 
HUGE CLOCK 

PETALS. BAS A GUESSING GAME USING 

THE PETALS ON A ROSE 

SHOWDOWN. BAS A TWO PLAYER FIGHT EM 

OUT GAME 

OMAZE.BAS A DIFFERENT TYPE 

GAME, IT ? 

DRAW. BAS CLEAR OR SHOULD I SAY 

COVER THE SCREEN IF 
YOU CAN 

APRIL DISK OF THE MONTH PROGRAMS 

PASS I ON EXCELLENT MUS I C 

SUPERLTR NICE GRAPHICS DISPLAY 

TESTPAT NIFTY PROGRAM 


5 - 




CAMP director : 

George Toops 
Computer Coordinator 
New London-Spicer H*S* 

instructor : 

Jan Kieber 
Computer Instructor 
Shakopee High School 

BOTH MEMBERS OF TAIG 



Featuring the 


ATARI 80QXL COMPUTER 


Utilizing the luxurious recreational facilities of 
Green Lake Bible Canp in beautiful Spicer # Hn* 
Canoeing# swinning# hiking# volleyball# basketball 
and softball are just a few of the outdoor 
activities to go along with a great variety of 
computer opportunities* 


CAMP TUITION -<175*00 - TAIG members, <160*00 - Includes board and 

room# instruction# insurance# camp t-shirt and diskette* 


L OCATI ON -Green Lake Bible Camp in Spicer, Mn. 10 miles north of 

Willmar on Hwy* 23* 100 miles west of Minneapolis* 

L ENGTH OF SESSION -Each session begins at 8:00p*m* on Sunday and 

ends at i:00p*m* on Friday* Registration begins 
at 6*00p*m* on Sunday and is limited * Applicants 
will be accepted on a first come# first serve 
basis* 

Please write for brochure or use application in February's TAIG newsletter 



Course Offerings : 
Begining BASIC 
Files 

Sort Routines 

Player /Missile Graphics 

Display Lists 

GTIA Graphics 

Scrolling 

Atari Assembler 

Applications 

AND MORE!! 

2 session s: 

August 12-17 
August 19-24 

1 Computer for 
every 2 campers 

camp address: 

GREEN LAKE COMPUTER CAKP 
Box 486 

Spicer# Mr»* 56288 
612-796-5221 


GRAPH CHOOSE A GRAPHICS MODE 

REMGAMES MATHT I ME AGA I N 

LUNAR LUNAR LANDING AGAIN 

MUNCHERS CHOMP , CHOMP , CHOMP 

BRIDGE CONTRACTORS AT WORK 

ROTATION AROUND & AROUND 

SEE YOU AT THE MEETING 


FORTH MIN I -GROUP 


ATR-8000&CP/M 
GROUP MEET I NG 

For all you CP/M and ATR-8000 
owners or anyone Interested, there 
will be a meeting at the Interest 
group time-slot (6p.m. )• Questions 
will be answered (hopefully) and we 
can discuss what’s going on In the 
CP/M — ATARI world. Hope to see you 
there. 


By Bob Floyd 

The FORTH mini-group will meet 
again at 6:00 pm. Just before the 
main group for the April meeting. 
I will have my 400, disk drive, TV 
and va I FORTH for hands-on learning 
and demonstration. With the 
limited time available, I plan to 
type In (and let you type In) some 
simple programs with and without 
the Editor. I hope to see a lot of 
you there. 


* AN ATARI OF MANY COLORS 
By Mark Neuman 

One of the questions asked on the 
T.A.I.G. Random Access Memo was, 
"How do you get more than five 
colors on the screen at once? 1 *. 
Since this Is an often asked 
question I wl 1 1 answer It In three 
parts, each dealing with a 
different technique. In this first 
article I wl 1 1 explain how to use 
"GRAPHICS 9, 10 and 11." Then In 

coming articles I will tell you 


about player missile graphics and 
display list Interrupts. 

To use any of these graphics modes 
your computer must have the GTIA 
chip, which all of the newer ATARI 
computers have. To see If your 
computer has the GTIA or the older 
CTI A type In this program. 

10 GR. 9 20 GOTO 20 

If your TV screen goes black and 
stays black (until you stop the 
program) your computer has the GTIA 
chip. However, If your TV screen 
stays blue, then you have the CTI A 
chip and at this time you will not 
be able to use these graphics 
modes. If you have a CTI A you can 
have any repair shop replace It 
with a GTIA for a nominal cost 
(approx. $40). 

These new graphics modes allow for 
many colors to be on the screen at 
one time. For example graphics 
mode 9 gives you one color but In 





sixteen shades, which you designate 
by using the COLOR command. Thus 
to get shade level zero (or black) 
you would type "COLOR 0" and plot 
away, but If you want shade level 
sixteen (or white) you would type 
"COLOR 16" and plot away, for other 
shades use COLOR numbers between 0 
and 16. 

This Is not to Indicate that you 
are limited to black to white, 
using "SETC0L0R 4, color, 0" will 
change the color In which all the 
shades will be displayed. Using 
this mode It Is possible to shade 
shapes and give them a 3-D look. 
Graphics mode 11 allows you to have 
up to sixteen colors on the screen 
at one time. All the colors will 
have the same shade level which Is 
set by the "SETC0L0R 4,0, shade" 
command. Then to select a color 
you use to "COLOR #" command, where 
the # Is the color you want to PLOT 
or DRAWTO with. By far the most 
used of these new graphics modes Is 
"GRAPHICS 10" which allows nine 
color/shade combinations. This 
gives you the choice of displaying 
up to 1152 different mixes of 
colors at the same time. Like the 
other graphics modes you select 
which color you want to PLOT by 
using the "COLOR #" command, but to 
set the colors you cannot use the 
"SETC0L0R" command. To set the 
color/shade you want you must POKE 
the data directly l nto the color 
registers. These registers are at 
addresses 704 to 712, with 704 
being COLOR #1 and Incrementing up 
to 712 being COLOR #9. You should 
note that the first four locations 
are the player missile color 
registers, so you must be careful 
If you Intend to use player missile 
graphics In graphics mode 9. A 
formula you can use to calculate 
what number to POKE to get the 
color/shade combination you want Is 
NUMBER =C0L0R*1 6+shade then POKE 
this NUMBER Into the appropriate 
register and you are all set. In 
all of these graphics modes the 


pixel plotted to the screen Is 
about four times as long as It Is 
deep, and gives you a 79x199 screen 
(with no text window) so you need 
to take care In planning your 
display to account for this awkward 
pixel. What I do Is make-believe 
that I have a graphics mode five 
screen. Then when I plot a pixel, I 
Immediately plot the next three 
below It, making each plotted point 
look like a square. One of the 
drawbacks Is that I cannot use the 
DRAWTO command, but such Is life. 
Now for those of you who want to 
see COLORS here Is a short program 
which will put all 256 colors on 
the screen at the same time. 


100 DIM X$( 1 7) :F0R Z=1 TO 15 
:READ W:X$(Z)=CHR$(W) :NEXT Z 
200 GRAPHICS 9: FOR K=0 TO 79 
sCOLOR K/5:PL0T K,0:DRAWT0 K, 1 91 
:NEXT K:K=USR(ADR(X$) ) 

220 DATA 173,11,212,10,229,20,41 
,240,141,26,208,208,243,240,241 


EDITORIAL COMMENTS 

I know that I will receive some 
complaints about flagging articles 
received after the deadline* I 
don't want to scare anyone off but 
I do want people to know what we 
have to go through to produce the 
news 1 etter • 

This newsletter should be In the 
lastest and greatest format (unless 
scheduling problems prohibit It) 
which Is, In case you didn't 
notice, 11" x 17" format. Please 
make some comments to the officers 
or to me at the next meeting. 

nnxxnnnxxnn 

FOR SALE I AXIOM AT100 dot Matrix 
graphics printer , direct connect to 
ATARI* $230*80 -ATARI 1025 printer, 
$300 -ATARI 825 printer, $300 

(612) 861-1893 


################################### 

################################### 


### ### 

### FY I ### 

### ### 

### To submit all those articles### 

### that you have on the back- ### 

### burner. ### 

### ### 

### 1) Drop a disk with your ### 

### article to me at the ### 

### meetings. ### 

### 2) Mall me your disk. ### 

### Ralph Jenson ### 

### 8008 W. 28th ### 

### St. Louis Park, MN 55426 ### 

### 3) Upload them to me. ### 

### Call me at 935-4397 ### 

### and we can figure out a ### 

### way. ### 

### ### 


################################### 

################################### 


TAIG HALL OF FAME 
by MDN 

Sorry I have not been writing 
lately, but I think I have finally 
got my act together. As you might 
have noticed, the High Score Box 
was at the last meeting and I 
recleved 5 scores to enter Into the 
Hall of Fame. If you want to enter 
a score. Just put It In the box. 
If you want, you can call me at 
452-5932 and tell me your score. 
Notice that this number Is 
different from the last. (My 
family and I Just moved.) 
Thanks, MDN. 

TAIG HALL OF FAME 


GAME 

SCORE 

PLAYERS NAME 

Encounter 

250,000 

Steve Vasel 

Robotron 

224,300 

Steve Vasel 

Star Trek 

305,000 

Steve Vasel 

Zepp 1 I n 

42,720 

Adam Vasel 

Getaway 

75,000 

James Hogan 

Jawbreaker 

55,180 

MDN 

Apple Panic 

153,930 

Don Nelson 

DlgDug 

114,800 

MDN 

Donkey Kong 

122,000 

MDN 


3546 PI Igrlm Lane 

Plymouth, MN 55441 

8008 West 28th Street #301 

^3FT 

lUN LIMITED 

St. Louis Park, MN 55426 

DISKS 

$1.49 


935-4397 


each generic 
in lots of 20 


$16.20 box of 10 wabash 


Disk prices have fallen off the deep end. We can't guarantee 
these prices for long so stock up. 

Why should I risk my data on generic disks one might ask? Well, 
I've been using these disks for many years and have not had a 
single failure. Even when doing things not recommended like: 
Double sided Double density on SSSD generic disks, or flipping 
disks, I've never had a drop-out. Some (read most) of the major 
software vendors use disks that are not labeled (read generic) . 
For you die-hard name brand fans look at the WABASH. 


BASIC XL, ACTION! or KoalaPads only $65. Indus disk drives (for 
using all those disks you just saved money on) $349. Joysticks: 
WICO BOSS $12, ProSticks $18. Tired of plastic? How about Teak 
Flip-files $29.97. Want to run CP/M or double sided 8" or 5 1/4" 
disks from your ATARI? ATR-8000s $415 (rumors have it that more 

than a few ATARI employees run with ATR-8000s.) Bandits clearance 
priced at $15. 


TWIN CITIES ATARI INTEREST GROUP 
6824 QUEEN AVENUE SOUTH 
RICHFIELD, MN 55423 



Next TAIG Meeting 

Sunday April 29, 
Interest Groups 
TAIG 


1984 

6:00 p.m. 
7:00 p.m. 


St. Louis Park Rec. Center 
5005 West 36th Street 
St. Louis Park 


